home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Night Owl 6
/
Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso
/
001a
/
bbsslt2.zip
/
R&E.SLT
< prev
next >
Wrap
Text File
|
1991-12-16
|
6KB
|
129 lines
//***************************************************************************
//*** *
//*** R U S T Y & E D I E ' S - - L O G O N *
//*** *
//*** Description: *
//*** Telix Script that automates the logon to Rusty & Edies BBS. *
//*** *
//*** *
//*** Script logic: *
//*** 1) Dials number specified by "phoneRow" variable. *
//*** 2) Logon to BBS automatically. *
//*** *
//*** Instructions: *
//*** To customize, fill in info wherever you find a //?? comment. *
//*** *
//*** Hints: *
//*** Script is easily modifible for other BBS's! *
//*** *
//*** *
//*** Author: *
//*** Joel R. DeRider *
//*** Jona Computer Associates *
//*** 181 Colleen Ave. *
//*** Shoreview, MN 55126-6253 *
//*** (612) 490-1238 *
//*** *
//*** Change Log: *
//*** 12/15/91 - Initial Revision. Dedicated to the public domain. *
//*** *
//*** *
//***************************************************************************
main()
{
str phoneRow [] = "?"; //?? point to BBS row in dialing dir
str firstName [] = "?"; //?? Your first name
str lastName [] = "?"; //?? Your last name
str bbsPassword [] = "?"; //?? Your BBS password
str cr [] = "^M";
str respondYes [] = "y";
str respondNo [] = "n";
int stringHit;
//------------------------------------------------------------------------
// String variables that will contain the strings to track
//------------------------------------------------------------------------
int aTrackedString1, aTrackedString2, aTrackedString3, aTrackedString4,
aTrackedString5, aTrackedString6, aTrackedString7;
dial (phoneRow,0); // Make the phone call
//------------------------------------------------------------------------
// Set the tracking strings for loop A.
//------------------------------------------------------------------------
aTrackedString1 = track ("Do you want graphics (Enter)=No?", 1);
aTrackedString2 = track ("What is your first name?", 1);
aTrackedString3 = track ("What is your last name?", 1);
aTrackedString4 = track ("Password (Dots will echo)?", 1);
aTrackedString5 = track ("(H)elp, More?", 1);
aTrackedString6 = track ("Press (Enter) to continue", 1);
aTrackedString7 = track ("Main Board Command?", 1);
//------------------------------------------------------------------------
// LOOP A
// Will get you logged on, then exits script.
//------------------------------------------------------------------------
while (1)
{
terminal();
stringHit = track_hit (0);
if (stringHit == aTrackedString1 )
{
cputs (respondYes);
cputs (cr);
track_free (aTrackedString1);
}
else if (stringHit == aTrackedString2)
{
cputs (firstName);
cputs (cr);
track_free (aTrackedString2);
}
else if (stringHit == aTrackedString3)
{
cputs (lastName);
cputs (cr);
track_free (aTrackedString3);
}
else if (stringHit == aTrackedString4)
{
cputs (bbsPassword);
cputs (cr);
track_free (aTrackedString4);
}
else if (stringHit == aTrackedString5)
{
cputs (respondNo);
cputs (cr);
}
else if (stringHit == aTrackedString6)
{
cputs (cr);
}
else if (stringHit == aTrackedString7)
{
track_free (aTrackedString7);
break;
}
}
//------------------------------------------------------------------------
// Let's clean up after ourselves!!
//------------------------------------------------------------------------
track_free (0); // Clear all the tracking strings.
return; // Make compiler happy and return from main.
}